Optional Gui.f

0 Value GUI
0 Value parent-z

:

: panel ( <<me>> -- )
   ['] sort-by-z 'sort !
   show:[
      push-modelview
      transform gl-transform3d
      them shows
      pop-modelview
   ;] ;
